home *** CD-ROM | disk | FTP | other *** search
/ Over 1,000 Windows 95 Programs / Over 1000 Windows 95 Programs (Microforum) (Disc 1).iso / 0091 / frsend.bat < prev    next >
DOS Batch File  |  1997-03-24  |  2KB  |  55 lines
  1. Echo off
  2. REM *********************************************************************/
  3. REM                                                                     */
  4. REM   SYSTEM       : HQ-FAX, Uitilities                                 */
  5. REM   COPYRIGHT    : (c) 1995 HTF CONSULTING                            */
  6. REM                                                                     */
  7. REM *********************************************************************/
  8. REM                                                                     */
  9. REM   BAT file name: FRSEND.bat                                         */
  10. REM   DESCRIPTION  : The FAX send batch file for the FAX96 product by   */
  11. REM                  Frmont Communications                              */
  12. REM                                                                     */
  13. REM *********************************************************************/
  14. REM
  15. if %1 == 1 goto Sendcovr
  16. if %1 == 2 goto Docsolo
  17. if %1 == 3 goto Docwcovr
  18. if %1 == 4 goto Docmany
  19. if %1 == 5 goto CDocmany
  20.  
  21. CLS
  22. Echo Sending Document %1 without cover letter to %2
  23. SendFAX.exe %1.0* %2 /G %3 %4 %5
  24. goto Quit
  25.  
  26. CLS
  27. :Sendcovr
  28. Echo Sending Cover letter solo to %3
  29. SendFAX.exe Covrletr.0* %3 /G %4 %5 %6
  30. goto Quit
  31.  
  32. :Docsolo
  33. Echo Sending Document %2 w/out cover letter to %3
  34. SendFAX.exe %2.0* %3 /G %4 %5 %6
  35. goto Quit
  36.  
  37. :Docwcovr
  38. Copy covrletr.001 %2.000
  39. SendFAX.exe %2.0* %3 /G %4 %5 %6
  40. goto Quit
  41.  
  42. :CDocmany
  43. Echo Sending multi-file document "%2" with cover letter  to %3
  44. Copy covrletr.001 %2.000
  45. SendFAX.exe %2.0* %3 /G %4 %5 %6
  46. goto Quit
  47.  
  48. :Docmany
  49. Echo Sending multi-file document "%2" w/out cover letter to %3
  50. Call Renamall.bat %2 F 0
  51. SendFAX.exe %2.0* %3 /G %3 %4 %5
  52.  
  53. :Quit
  54. Echo on
  55.